home *** CD-ROM | disk | FTP | other *** search
- # -*- mode: shell-script; sh-basic-offset: 8; indent-tabs-mode: t -*-
- # ex: ts=8 sw=8 noet filetype=sh
- #
- # bash programmable completion for various Common Lisp implementations by
- # Nikodemus Siivola <nikodemus@random-state.net>
-
- _lisp()
- {
- local cur
-
- COMPREPLY=()
- cur=`_get_cword`
-
- # completing an option (may or may not be separated by a space)
- if [[ "$cur" == -* ]]; then
- COMPREPLY=( $( compgen -W '-core -lib -batch -quit -edit -eval -init \
- -dynamic-space-size -hinit -noinit -nositeinit -load \
- -slave ' \
- -- $cur ) )
- else
- _filedir
- fi
-
- return 0
- }
- complete -F _lisp -o default lisp
-